home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 June / EnigmA AMIGA RUN 19 (1997)(G.R. Edizioni)(IT)[!][issue 1997-06][EAR-CD III].iso / recent1 / dvc.lha / DVC / Scripts / MakeDevList < prev    next >
Text File  |  1997-03-06  |  1KB  |  41 lines
  1. ;$VER: MakeDevList 1.0 (25.2.97) Msi Software
  2.  
  3. ; Example ADOS Script for creating a Device list with (and for) DVC.
  4. ;
  5. ;********************************************************************
  6. ; I had all these GREAT ideas "buzzing" in my head,
  7. ; and by accident I hit the snooze button!
  8. ; Roger Hågensen...
  9. ;
  10.  
  11. FAILAT 10
  12. ECHO "MakeDevList 1.0 © Msi Software 1997"
  13.  
  14. ; Add ID to DVC list! (The single > create a file, >> appends to a file!)
  15. ECHO >DevList.dvc "DVC1 (Don't change this line!)"
  16.  
  17. ; Add $VER: line, you may edit this one later!
  18. ECHO >>DevList.dvc ";$VER: DevList.dvc 1.0 (23.2.97) MakeDevList 1.0*N"
  19.  
  20. ; Here the magic (and the mess) begin!
  21.  
  22. ECHO >T:script.tmp "FAILAT 10"
  23. ECHO >>T:script.tmp "ECHO >T:unsorted.tmp *"*" NOLINE"
  24. ECHO >>T:script.tmp "RESIDENT C:DVC FORCE"
  25.  
  26. ;This line let C:List do the dirty work on listing the DEVS: drawer,
  27. ;and also creating the script part that generate the unsorted list.
  28. ECHO "Getting filenames..."
  29. LIST DEVS: FILES ALL LFORMAT="DVC *"%p%n*" INFO >>T:unsorted.tmp" >>T:script.tmp
  30.  
  31. ECHO >>T:script.tmp "RESIDENT DVC REMOVE"
  32. ECHO "Getting fileversions..."
  33. EXECUTE T:script.tmp
  34. DELETE T:script.tmp QUIET
  35. ECHO "Sorting filenames..."
  36. SORT T:unsorted.tmp T:sorted.tmp
  37. DELETE T:unsorted.tmp QUIET
  38. TYPE T:sorted.tmp >>DevList.dvc
  39. DELETE T:sorted.tmp QUIET
  40. ECHO "Finished!"
  41.